* lisp/net/rcirc.el (rcirc-generate-log-filename): Append ".log"

(Bug#54718)

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index fa481ce528341b0e6806f147ceccdd90087e06b3..1da4fce831536db7fcff1c3e16dcda1fe1d7e449 100644 (file)
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2176,9 +2176,11 @@ connection."
 
 (defun rcirc-generate-log-filename (process target)
   "Return filename for log file based on PROCESS and TARGET."
-  (if target
-      (rcirc-generate-new-buffer-name process target)
-    (process-name process)))
+  (concat
+   (if target
+       (rcirc-generate-new-buffer-name process target)
+     (process-name process))
+   ".log"))
 
 (defcustom rcirc-log-filename-function 'rcirc-generate-log-filename
   "A function to generate the filename used by rcirc's logging facility.